home *** CD-ROM | disk | FTP | other *** search
Text File | 1992-01-29 | 4.9 KB | 127 lines | [TEXT/MPS ] |
- ;___________________________________________________________________________
- ; Lap Manager Public Equates
- ; © Apple Computer 1989-1991
- ; All rights reserved
-
- IF &TYPE('__IncludingLAPEqu__') = 'UNDEFINED' THEN
- __IncludingLAPEqu__ SET 1
-
- ;
- ; LAP Manager call codes passed in D0 (call at [ATalkHk2] + 2)
- ;
- LRdDispatch EQU 1 ; Dispatch to protocol handler
- LWrtInsert EQU 2 ; Insert in LAPWrite hook
- LWrtRemove EQU 3 ; Remove from LAPWrite hook
- LWrtGet EQU 4 ; Get who's in LAPWrite hook
- LSetInUse EQU 5 ; Set address in use flag
- LGetSelfSend EQU 6 ; Get value of self send flag
- LAARPAttach EQU 7 ; Attach an AARP listener
- LAARPDetach EQU 8 ; Detach an AARP listener
- LGetATalkInfo EQU 9 ; Get AppleTalk info
- LGetPortInfo EQU 10 ; Get port info
- LOpenADEV EQU 11 ; Open ADEV file
- LNSetInUse EQU 12 ; Port-based set-in-use call
- LGetBridgeInfo EQU 13 ; Get bridge info
- LSetATalkInfo EQU 14 ; Set AppleTalk info
- LShutdownBridge EQU 15 ; Shut down bridge
- LInit EQU 16 ; init run time LAP manager
- LUsePortB EQU 17 ; request use of printer port
- LFreePortB EQU 18 ; grant use of printer port
- LStatPortB EQU 19 ; obtain current printer port status
- LNetAlert EQU 20 ; notify user of network alert condition
- L802Attach EQU 21 ; attach an 802.2 protocol handler
- L802Detach EQU 22 ; detach an 802.2 protocol handler
- LAddAEQ EQU 23 ; add AppleTalk event queue entry
- LRmvAEQ EQU 24 ; remove AppleTalk event queue entry
- LGetAEQ EQU 25 ; get pointer to AppleTalk event queue
- LLastCall EQU LGetAEQ ; Last valid call
-
- ;
- ; Flag bits passed in D1 on LWrtInsert
- ;
- LWSelfSend EQU 7 ; ADEV handles self send
- LWSrvrWks EQU 5 ; Honor server/wks bit
- LWVMdefer EQU 4 ; buffer and defer incoming packets
- LWReserved EQU 0 ; Reserved for internal use
-
- ;
- ; atlk call codes passed in D0 (call at atlk start plus 2)
- ;
- AInstall EQU 1 ; Installation
- AShutdown EQU 2 ; Shutdown
- AGetInfo EQU 3 ; Get link information
- AGetMCast EQU 4 ; Get multicast addr
- ASetMCast EQU 5 ; Set multicast addr
- ADelMCast EQU 6 ; Delete multicast addr
- AOpen EQU 7 ; Open an ATlk
- AClose EQU 8 ; Close an ATlk
- AEnq EQU 9 ; send ENQ's for a node address
- ADelAddr EQU 10 ; remove an established node address
-
- ;
- ; ADEV call code passed in D0 (call at ADEV start)
- ;
-
- GetADEV EQU 101 ; Get next ADEV
- SelectADEV EQU 102 ; Select ADEV
- ReSelADEV EQU 103 ; Re-selected ADEV
-
- LAPMgrPtr EQU $B18 ; This points to our start (???ATalkHk2?)
- LAPMgrCall EQU 2 ; Offset to make LAP manager calls
- atlkCall EQU 2 ; Offset to make atlk calls at
-
- ;
- ; Resource IDs
- ;
- adevBaseID EQU -4032 ; Base resource ID for ADEVs
-
- ;
- ; atlk AGetInfo call
- ;
- ; (big enough to handle 6 byte link addr)
-
- ATlkInfo RECORD 0 ; link information
- Version DS.W 1 ; version number
- InfoLength DS.W 1 ; length of this rec
- LinkSpeed DS.L 1 ; speed of link in bits/second
- BandWidth DS.B 1 ; bandwidth factor
- Reserved DS.B 3
- Flags DS.B 1 ; informative flags (see below)
- LinkAdrLen DS.B 1 ; link address length in bytes
- LinkAddress DS.B 6 ; start of link address (reserve 6 bytes)
- MaxNodes DS.W 1 ; max. number of nodes (base zero)
- Size EQU *
- ENDR
-
- AInfoVers EQU 3 ; version number describes reply buffer below
- AInfoSz EQU ATlkInfo.Size ; size in bytes of reply buffer
-
- ;
- ; atlk AGetInfo flags
- ;
- AtlkExtended EQU 7 ; bit in on if link has extended addressing
- AtlkROnly EQU 6 ; true if link is for router only ports
-
- ; Transition Queue Structures
-
- ; Transition Queue Element
-
- ATQel RECORD 0
- AeQQLink DS.L 1 ; link field
- AeQQType DS.W 1 ; queue type (dont care)
- AeQCallAddr DS.L 1 ; procedure address
- AeQSize EQU *
- ENDR
-
- ; Transitions
- ; %%% Change spelling to match inside Mac
- ;AOpenTask EQU 0 ; q type for open
- ;ACloseTellTask EQU 2
- ;ACloseAskTask EQU 3
- ;ACanclAskTask EQU 4
- ATTransOpen EQU 0 ; Open Transition
- ATTransClose EQU 2 ; Close Transition
- ATTransClosePrep EQU 3 ; Close Prep Transition
- ATTransCancelClose EQU 4 ; Cancel Close Prep
-
- ENDIF ; ...already included